(update-subdirs-CMD): Generate the right list of subdirectories. From

Tak Ota <Takaaki.Ota@am.sony.com>.

diff --git a/lisp/makefile.w32-in b/lisp/makefile.w32-in
index e3d42edc8fb29edbc3a9fd9b1c895161ae407ec9..a2c2be48b13c8d168f03e7ecd1c09de4bd6e9ea0 100644 (file)
--- a/lisp/makefile.w32-in
+++ b/lisp/makefile.w32-in
@@ -195,11 +195,11 @@ subdirs.el:
 update-subdirs: update-subdirs-$(SHELLTYPE)
 
 update-subdirs-CMD: doit
-       @set QWINS=
-       @for %d in ($(WINS)) do if not (%d)==(term) set QWINS=%QWINS% "%d"
        echo ;; In load-path, after this directory should come> subdirs.el
        echo ;; certain of its subdirectories.  Here we specify them.>> subdirs.el
-       echo (normal-top-level-add-to-load-path $(SQUOTE)(%QWINS%))>> subdirs.el
+       echo (normal-top-level-add-to-load-path $(SQUOTE)(>> subdirs.el
+       @for %d in ($(WINS)) do if not (%d)==(term) echo "%d">> subdirs.el
+       echo ))>> subdirs.el
 
 update-subdirs-SH: doit
        wd=$(lisp); $(setwins); \